home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs12.d81 / nw126-3.sda / IND.OV.NW (.txt) < prev    next >
Commodore BASIC  |  2009-10-10  |  111b  |  4 lines
  1. 13140 FORI=0TO42:IFASC(A$)<>CM%(I,1)THENNEXT:GOSUB995:GOTO13120
  2. 13160 ONI/10+1GOTO13170,13180,13190,13195,13197
  3. 13197 ONI-39GOTO102,102,102
  4.